USE [Bases2]
GO
/****** Object:  StoredProcedure [dbo].[CrearTipoCuenta]    Script Date: 11/28/2011 11:54:44 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER PROCEDURE [dbo].[CrearTipoCuenta]
    @Nombre varchar(50)     
AS 
BEGIN
	SET NOCOUNT ON
	BEGIN TRANSACTION
	DECLARE @Contador int
	SET @Contador=0        
    
    SELECT @Contador=COUNT(1)
    FROM TIPO_CUENTA WHERE nombre=@Nombre
    
    IF @Contador>0
    BEGIN
		SELECT 'Ya existe un tipo de cuenta de nombre: '+@Nombre+'.'
	END
	ELSE
	BEGIN
		SELECT TOP(1) @Contador=TIPO_CUENTA.id_tipo_cuenta
		FROM TIPO_CUENTA
		ORDER BY TIPO_CUENTA.id_tipo_cuenta DESC
		
		IF @Contador IS NULL
		BEGIN
			SET @Contador=-1
		END
		
		SET @Contador=@Contador+1		 		
		
		INSERT INTO TIPO_CUENTA VALUES(@Contador,@Nombre)
		SELECT 'Tipo de cuenta creado exitosamente.'
	END	
	COMMIT
	SET NOCOUNT OFF
END
